This forum is closed to new posts and
responses. Individual names altered for privacy purposes. The information contained in this website is provided for informational purposes only and should not be construed as a forum for customer support requests. Any customer support requests should be directed to the official HCL customer support channels below:
~Sarah Xanfanatexli 19.Dec.03 06:02 PM a Web browser Domino DesignerAll ReleasesAll Platforms
I'm trying to return the user's mailbox filesize into a form field but I'm getting a type mistmatch in this code. Any help would be greatly appreciated. Thanks!
Dim mailbox As String
Dim mailfile As String
mailbox= Evaluate("@Name([CN];@Subset (@MailDbName;1))")
mailfile=Evaluate("@Subset(@MailDbName;-1)")
Dim db4 As New NotesDatabase( mailbox,mailfile )
Dim workspace As New NotesUIWorkspace
Dim session As New NotesSession
Dim uidoc As NotesUIDocument
Set db4 = session.CurrentDatabase
Set uidoc = workspace.CurrentDocument
' find the size of the user's mail database
size4 = db4.Size /1054000
Call uidoc.FieldSetText( "Display_Sz", Cstr(size4) )